home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 July / 07_02.iso / software / xq-xsetup / files / setup.exe / {app} / plugins / XQ WinNT Unlock Delay.xpl < prev    next >
Text File  |  2001-01-06  |  1KB  |  43 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="1"
  3. "COUNT"="1"
  4. "UIPATH"="Network\Server"
  5. "NAME"="Unlock Domain Refresh Delay"
  6. "VERSION"="1.10"
  7. "OSVERSION"="01000"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Unlock Delay[s]"
  10. "DESCRIPTION 1"="For WinNT [ver 4.0 Workstation and Server]: By default when a Workstation is unlocked, the domain list is updated if the cached list's age exceeds 120 seconds."
  11. "DESCRIPTION 2"="To avoid delays this time limit can be increased up to a value of 86400 seconds [one day]."
  12. "DESCRIPTION 3"="Enter a value from "120" to "86400" [no quotes]."
  13. "DESCRIPTION 4"="For more information see MSKB article: http://support.microsoft.com/support/kb/articles/q160/8/39.asp."
  14. "AUTHOR"="Ojatex@aol.com"
  15. "CONTACTURL"="http://members.aol.com/ojatex/"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 1"="For additional X-Setup program information, go to http://www.xteq.com."
  18. "COMMENT 2"="Thanks to CptSiskoX for the suggestion."
  19.  
  20. sP="HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\DcacheMinInterval"
  21.  
  22. Sub Plugin_Initialize 
  23.   i=RegReadValue(sP)
  24.   SetUIElement 1,i
  25. End Sub
  26.  
  27. Sub Plugin_CheckData(ElementIndex)
  28. End Sub
  29.  
  30. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  31.  i=GetUIElement(1)
  32.  if len(i)>0 then
  33.     Call RegWriteValue(sP,i,2)
  34.  else
  35.     If RegValueExists(sP) then RegDeleteValue(sP)
  36.  end if
  37.  
  38.  Call Restart() 
  39. End Sub
  40.  
  41. Sub Plugin_Terminate 
  42. End Sub
  43.